home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #4 / Amiga Plus CD - 2000 - No. 4.iso / Tools / Misc / AmiSPICEed / Install_AmiSPICEed < prev    next >
Encoding:
Text File  |  1999-04-01  |  5.9 KB  |  150 lines

  1. ;
  2. ; Installer script for AmiSPICEed
  3. ; $VER: Install_AmiSPICEed 2.1
  4. ;
  5.  
  6. ;*** set strings ***
  7. (set #os-to-old "Your Amiga-OS is to old, sorry...")
  8. (set #select-dir "Select a directory for AmiSPICEed.\nA new directory named >AmiSPICEed< will be created there!")
  9. (set #prog-choice "Which program version?")
  10. (set #language-choice "Choose your language")
  11. (set #select-spice "Executable file of SPICE")
  12.  
  13. (if (= @language "deutsch")
  14.   (
  15.   (set #os-to-old "Dein Amiga-OS ist leider zu alt...")
  16.   (set #select-dir "Wähle ein Verzeichnis für AmiSPICEed aus.\nDort wird ein neues Verzeichnis namens >AmiSPICEed< angelegt!")
  17.   (set #prog-choice "Welche Programmversion?")
  18.   (set #language-choice "Wähle Deine Sprache")
  19.   (set #select-spice "Ausführbare SPICE-Datei")
  20.   ))
  21.  
  22. (if (= @language "español")
  23.   (
  24.   (set #os-to-old "Tu Amiga es demasiado antiguo, lo siento pero...")
  25.   (set #select-dir "Selecciona un directorio para AmiSPICEed.\nUn nuevo directorio llamado >AmiSPICEed< sera creado alli!")
  26.   (set #prog-choice "Que versión del programa?")
  27.   (set #language-choice "Elige tu idioma")
  28.   (set #select-spice "Fichero ejecutable del SPICE")
  29.   ))
  30.  
  31. (if (= @language "polski")
  32.   (
  33.   (set #os-to-old "Przykro mi,masz za stary system operacyjny...")
  34.   (set #select-dir "Wskaû gdzie ma byê zainstalowany AmiSPICEed.\nZostanie tu zaîoûony katalog >AmiSPICEed< !")
  35.   (set #prog-choice "Która wersja programu?")
  36.   (set #language-choice "Wybierz swój jëzyk")
  37.   (set #select-spice "Plik wykonywalny SPICE")
  38.   ))
  39.  
  40. ;*** get some system info ***
  41. (set vernum (getversion "libs:version.library"))
  42. (set ver (/ vernum 65536))
  43.  
  44. ;*** start ***
  45. (complete 0)
  46. (if (< ver 36) (abort #os-to-old))
  47. (welcome)
  48. (user 3)
  49.  
  50. ;create directory
  51. (set directory (askdir (prompt #select-dir) (help @askdir-help) (default "RAM:") (disk)))
  52. (makedir (tackon directory "AmiSPICEed") (infos))
  53. (set directory (tackon directory "AmiSPICEed"))
  54. (complete 10)
  55.  
  56. ;copy main prog
  57. (set machine (askchoice (choices "AmiSPICEed 68000" "AmiSPICEed 68020+/FPU" "AmiSPICEed 68040/040" "AmiSPICEed 68060") (prompt #prog-choice) (help @askchoice-help)))
  58. (if (= machine 0)
  59.   (copyfiles (prompt #copy-main) (source "AmiSPICEed") (dest directory) (infos) (noposition))
  60.   (if (= machine 1)
  61.     (copyfiles (prompt #copy-main-FPU) (source "AmiSPICEed_020FPU") (dest directory) (newname "AmiSPICEed") (infos) (noposition))
  62.     (if (= machine 2)
  63.       (copyfiles (prompt #copy-main-040) (source "AmiSPICEed_040") (dest directory) (newname "AmiSPICEed") (infos) (noposition))
  64.       (copyfiles (prompt #copy-main-060) (source "AmiSPICEed_060") (dest directory) (newname "AmiSPICEed") (infos) (noposition)))))
  65. (complete 20)
  66.  
  67. ;copy prefs file
  68. (copyfiles (prompt #copy-prefs) (source "AmiSPICEed.prefs") (dest directory))
  69. (complete 30)
  70.  
  71. ;ask for language
  72. (set instlang (askchoice (choices "english" "deutsch" "español" "italiano" "français" "polski") (prompt #language-choice) (help @askchoice-help)))
  73.  
  74. ;copy catalog
  75. ;english
  76. (if (= instlang 0)
  77.   (
  78.   (copyfiles (prompt #copy-manual) (source "AmiSPICEed_english.guide") (dest directory) (newname "AmiSPICEed.guide") (infos))
  79.   (complete 50)
  80.   ))
  81. ;deutsch
  82. (if (= instlang 1)
  83.   (
  84.   (copyfiles (prompt #copy-manual) (source "AmiSPICEed.guide") (dest directory) (newname "AmiSPICEed.guide") (infos))
  85.   (complete 40)
  86.   (makedir (tackon directory "Catalogs/deutsch"))
  87.   (copyfiles (prompt #copy-locale) (source "Catalogs/deutsch/AmiSPICEed.catalog") (dest (tackon directory "Catalogs/deutsch")))
  88.   (complete 50)
  89.   ))
  90. ;español
  91. (if (= instlang 2)
  92.   (
  93.   (copyfiles (prompt #copy-manual) (source "AmiSPICEed_spanish.guide") (dest directory) (newname "AmiSPICEed.guide") (infos))
  94.   (complete 40)
  95.   (makedir (tackon directory "Catalogs/español"))
  96.   (copyfiles (prompt #copy-locale) (source "Catalogs/español/AmiSPICEed.catalog") (dest (tackon directory "Catalogs/español")))
  97.   (complete 50)
  98.   ))
  99. ;italiano
  100. (if (= instlang 3)
  101.   (
  102.   (copyfiles (prompt #copy-manual) (source "AmiSPICEed_english.guide") (dest directory) (newname "AmiSPICEed.guide") (infos))
  103.   (complete 40)
  104.   (makedir (tackon directory "Catalogs/italiano"))
  105.   (copyfiles (prompt #copy-locale) (source "Catalogs/italiano/AmiSPICEed.catalog") (dest (tackon directory "Catalogs/italiano")))
  106.   (complete 50)
  107.   ))
  108. ;français
  109. (if (= instlang 4)
  110.   (
  111.   (copyfiles (prompt #copy-manual) (source "AmiSPICEed_french.guide") (dest directory) (newname "AmiSPICEed.guide") (infos))
  112.   (complete 40)
  113.   (makedir (tackon directory "Catalogs/français"))
  114.   (copyfiles (prompt #copy-locale) (source "Catalogs/français/AmiSPICEed.catalog") (dest (tackon directory "Catalogs/français")))
  115.   (complete 50)
  116.   ))
  117. ;polski
  118. (if (= instlang 5)
  119.   (
  120.   (copyfiles (prompt #copy-manual) (source "AmiSPICEed_english.guide") (dest directory) (newname "AmiSPICEed.guide") (infos))
  121.   (complete 40)
  122.   (makedir (tackon directory "Catalogs/polski"))
  123.   (copyfiles (prompt #copy-locale) (source "Catalogs/polski/AmiSPICEed.catalog") (dest (tackon directory "Catalogs/polski")))
  124.   (complete 50)
  125.   ))
  126.  
  127. ;copy images and History
  128. (copyfiles (prompt #copy-iff) (source "surfing.iff") (dest directory))
  129. (copyfiles (prompt #copy-iff) (source "NE5561.iff") (dest directory) (infos))
  130. (copyfiles (prompt #copy-iff) (source "History") (dest directory) (infos))
  131. ;copy directories
  132. (makedir (tackon directory "circs"))
  133. (copyfiles (prompt #copy-circs) (source "circs") (dest (tackon directory "circs")) (all))
  134. (complete 60)
  135. (makedir (tackon directory "bibs"))
  136. (copyfiles (prompt #copy-bibs) (source "bibs") (dest (tackon directory "bibs")) (all))
  137. (complete 70)
  138. (makedir (tackon directory "spice"))
  139. (copyfiles (prompt #copy-spice) (source "spice") (dest (tackon directory "spice")) (all))
  140. (complete 80)
  141. (makedir (tackon directory "TeX"))
  142. (copyfiles (prompt #copy-TeX) (source "TeX") (dest (tackon directory "TeX")) (all))
  143. (complete 90)
  144.  
  145. ;modify SPICEEXE tooltype
  146. (set #spice (askfile (prompt #select-spice) (help @askfile-help) (default "spice3f5full")))
  147. (tooltype (prompt #change-tooltype) (help @tooltype-help) (dest (tackon directory "AmiSPICEed")) (settooltype "SPICEEXE" #spice))
  148. (complete 100)
  149.  
  150.